﻿Imports WeifenLuo.WinFormsUI.Docking

Public Class ConsoleOutputDock
    Inherits BaseDock

    Public Property ConsoleOutput As ConsoleOutput

    Public Sub New()
        ConsoleOutput = New ConsoleOutput()
        ConsoleOutput.Dock = DockStyle.Fill

        Text = "Console Output"

        DockHandler.HideOnClose = True

        DockAreas = WeifenLuo.WinFormsUI.Docking.DockAreas.DockBottom Or
            WeifenLuo.WinFormsUI.Docking.DockAreas.DockTop Or
            WeifenLuo.WinFormsUI.Docking.DockAreas.Float

        ' Default to bottom
        'DockState = WeifenLuo.WinFormsUI.Docking.DockState.DockBottom

        Me.Controls.Add(ConsoleOutput)
    End Sub

End Class
